home *** CD-ROM | disk | FTP | other *** search
/ MacFormat 1998 January / macformat-059.iso / mac / Demos / Martial Arts Demo / media / exit.Dxr / Internal_4.ls < prev    next >
Encoding:
Text File  |  1997-09-30  |  1.6 KB  |  57 lines
  1. on exitFrame
  2.   repeat with a = 8 to 11
  3.     if rollOver(a) and the mouseDown then
  4.       case the rollOver of
  5.         8:
  6.           puppetSound("PUNCH")
  7.           puppetSprite(8, 1)
  8.           set the member of sprite 8 to member (the memberNum of sprite 8 + 1) of castLib "graphics"
  9.           updateStage()
  10.           sixthSecDel()
  11.           puppetSprite(8, 0)
  12.           updateStage()
  13.           go("SPLASH")
  14.         9:
  15.           cursorSign()
  16.           puppetSound("PUNCH")
  17.           puppetSprite(9, 0)
  18.           set the member of sprite 9 to member (the memberNum of sprite 9 + 1) of castLib "graphics"
  19.           updateStage()
  20.           sixthSecDel()
  21.           puppetSprite(9, 0)
  22.           updateStage()
  23.           repeat with a = 1 to 48
  24.             puppetSprite(a, 0)
  25.           end repeat
  26.           go("blackout")
  27.           go("main", "main.dir")
  28.           abort()
  29.         10:
  30.           puppetSound("GRUNT")
  31.           puppetSprite(10, 1)
  32.           set the member of sprite 10 to member (the memberNum of sprite 10 + 1) of castLib "graphics"
  33.           updateStage()
  34.           sixthSecDel()
  35.           puppetSprite(10, 0)
  36.           updateStage()
  37.         11:
  38.           puppetSound("PUNCH")
  39.           puppetSprite(11, 1)
  40.           set the member of sprite 11 to member (the memberNum of sprite 11 + 1) of castLib "graphics"
  41.           updateStage()
  42.           sixthSecDel()
  43.           puppetSprite(11, 0)
  44.           updateStage()
  45.           go("JEANHICKSCREDS")
  46.       end case
  47.     end if
  48.   end repeat
  49.   if rollOver(47) and the mouseDown then
  50.     case the rollOver of
  51.       47:
  52.         ReturnToMain()
  53.     end case
  54.   end if
  55.   go(the frame)
  56. end
  57.